home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Coverdisks / CDU / V4D03.D64 / sys680 boot ldr (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  862 b   |  18 lines
  1. 10 REM -- BASIC LOADER FOR "SYS680"BOOT -- ELAINE FOSTER
  2. 20 REM -- LOADS AND RUNS ANY PRG ON DISK, WITH ASCII FOR NAME IN LINE 120
  3. 30 REM -- AND NUMBER OF CHARACTERS IN NAME, IN LINE 80 AS PER THE REMS.
  4. 40 REM
  5. 50 REM -- WHEN YOU RUN THIS PRG IT INSTALLS THE MC ROUTINE AT 680.
  6. 60 REM -- SYS680 LOADS AND RUNS THE PROGRAMME SPECIFIED IN LINES 80 AND 120.
  7. 70 REM
  8. 80 DATA169,008,170,160,001,032,186,255,169,004:REM -- 004= # OF CHARS IN NAME
  9. 90 DATA162,203,160,002,032,189,255,169,000,032
  10. 100 DATA213,255,134,045,132,046,032,089,166,032
  11. 110 DATA113,168,076,174,167
  12. 120 DATA071,065,077,069:REM -- IN THIS LINE ENTER THE ASCII FOR THE NAME TO LOAD
  13. 130 REM -- IT IS PRESENTLY SET UP TO LOAD THE FILENAME "GAME", 4 CHARACTERS.
  14. 140 FORX=680TO718:READY:POKEX,Y:NEXT
  15. 150 POKE53280,3:POKE53281,1:POKE646,6:PRINT"[147] BOOT INSTALLED...
  16. 160 [153]" SYS680 TO LOAD AND RUN THE PROGRAMME
  17. 170 PRINT" FOR WHICH IT IS SET UP. SEE REMS.
  18.